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I. INTRODUCTION 



A. GENERAL DISCUSSION 

In a school or many companies, several personal 
computers are used on the same floor or the same room. 
Instead of having a printer with each personal computer, it 
is economical to share a high quality printer among many 
users. More generally, it is economical to share other high 
cost resources such as laser printers, Ethernet local area 
network controllers, high capacity disc units, among the 
personal computer users. It is the motivation to share 
expensive resources that has given rise to this thesis. 

To design and implement a system which permits the 
sharing of a printer among twenty- three users, each user 
making use of a Zenith Z-100 personal computer, the hardware 
system, known as the Concentrator, consists of a MULTIBUS 
based backplane with an independent power supply, an INTEL 
iSBC 86/12A single board computer, three National 
Semiconductor BLC 8538 serial I/O expansion boards, all 
enclosed in a cardcage. The Zenith Z-100 personal computers 
are connected via their teletype ports (RS232 compatible) to 
the I/O ports of the Concentrator. 

The software system consists of the Control 
Program, which is down- loaded from a Z-100 at power-up of the 
Concentrator and any Z-100 system, and which thereafter 
executes in the Concentrator permitting the shared use of 
the printer on a first-come first-serve basis. 

The remaining software is a utility program, called 
SPOOL, which operates in the CP/M environment on the Z-100 
and permits the user to store his interactive printer data 
on his disc unit, while the printer is busy printing another 
user's files. 

The Control Program in the concentrator is implemented 
in assembly language. The CP/M operating system in the 
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Z-100 is modified by modifying the Basic Input/Output System 
(BIOS) of CP/M- 85 for use for communication with the 
Concentrator . 

The SPOOL program, also written in assembly code, allows 
the users to share the high speed printer in a batch mode, 
that is, each user prints out the files he desires, while 
any other user who wishes to make interactive use of the 
printer at the same time can save the information in his 
disk file for later batch printing. This permits an econom- 
ical usage of a high cost resource without the inconvenience 
of long waits due to interactive use of the printer. 

B. FORMAT OF THESIS 

Chapter I gives an overview of this thesis. It also 
provides the general concepts and the construction of our 
system and explains why this thesis has practical value. 

Chapter II explains the hardware basis of the system. 
Detailed information is given about all major hardware 
components which are used to construct the printer sharing 
system which is implemented in this thesis. 

Chapter III describes the general structure of the CP/M 
operating system. The standard CP/M-85 operating system is 
discussed in moderate detail. Also covered is the modifica- 
tion of the CP/M-85 necessary to carry out the project. 

Chapter IV explains the role and the structure of the 
Concentrator. Three utility programs, BOOT, CONTROL, and 
SPOOL, are explained in detail. 

Chapter V summarizes the advantage of this system and 
indicates a direction for future research for microcomputer 
communication and networking using the local area network, 
Ethernet . 
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II. HARDWARE BASIS OF THE SYSTEM 



As stated in the introduction, the most important hard- 
ware components of this system are the iSBC 86/12A single 
board computer, the I/O expansion board, the multiple Z-100 
microcomputers and the printer. Figure 2.1 depicts the 
interconnection of these components as they exist at this 
time. In the paragraphs which follow, a description of each 
component and its role in the overall system, is explained. 
A detailed description of each component can be found in the 
cited references. 

A. ISBC 86/12A SINGLE BOARD COMPUTER 
1 . General Description 

The iSBC 86/12A single board computer, which is a 
member of Intel's complete line of 8-bit and 16-bit single 
board computer products, is a complete computer system on a 
single printed- circuit assembly. This board includes a 
16-bit Central Processing Unit (CPU), up to 32K bytes of 
Erasable Programmable Read Only Memory (EPROM) , 64K bytes of 
Random Access Memory (RAM), a serial communications inter- 
face, three programmable parallel I/O ports, programmable 
timers, priority interrupt control, MULTIBUS interrupt 
control logic, and bus expansion drivers for interfaces with 
other MULTIBUS interface-compatible expansion boards. The 
systems view, however, is an abstract model, as systems 
exist only in the mind of the analyst. [Ref. 4: 1.1 - 1.3]. 
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CONCENTRATOR 




Figure 2.1 System Configuration. 

2 . Memory 

The iSBC 86/12A board includes 64K bytes of read/ 
write memory composed of sixteen 2117 Dynamic RAM chips and 
an 8202 RAM controller. 

Four IC sockets are provided for user installation 
of EPROM chips, and jumpers are provided to accommodate 
either 2K, 4K , or 8K chips. The EPROM address space is 
located at the top of the 1-megabyte memory space because 
the 8086 CPU branches to FFFFO after a reset. 

This single board computer is used as the controller 
in the system. The control process of the Concentrator is 
loaded into the memory of this iSBC 86/12A single board 
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computer at the time of initialization of the system. The 
control process communicates to the multiple Z- 100's and the 
printer, and receives or sends data from or to the devices. 
For the detail of the memory organization, see [Ref. 4: pp 
4.2 - 4.3] . 

B. INTEL 8086 

The Intel 8086 is a high performance, general purpose 
16-bit microprocessor. The 8086 is a full 16-bit processor 
with respect to both its internal structure, and its 
external connections. Refer to Figure 2.2 for a general 
overview of its internal structure and organization. This 
section is intended to give general knowledge about this 
device. A detailed description can be found in [Ref. 3]. 

1. Maj or Features of the 8086 

In this section, we shall discuss the major features 
of the 8086 CPU chip. The 8086 has a 20-bit-wide address 
bus, providing it with the capability of addressing a full 
megabyte of memory. However, the address registers of the 
8086 chip are only sixteen bits wide. This is equivalent to 
only sixty four kilobytes. This processor uses a method 
called segmentation to allow smooth access to the whole 
megabyte of address space. The twenty bit physical address 
is formed, by adding a sixteen bit offset to a twenty bit 
address whose most significant sixteen bits come from a 
sixteen bit segment register. 

2 . Registers 

The 8086 contains fourteen 16-bit registers. Some 
of these belong to the EU(Execution Unit) and others belong 
to the BIU(Bus Interface Unit). The EU registers tend to be 
general-purpose registers, whereas the BIU registers tend to 
be used for addressing. There are eight 16-bit general 
purpose registers. Four of these are byte or word addres- 
sable and are referred to as the 'data group'. The 
remaining four are only word addressable and are referred to 
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Figure 2.2 Functional Structure of 8086. 

as the pointer and index register, SP, BP, SI, and DI , which 
cannot be further subdivided. 

SP is the stack pointer, BP is the base pointer and 
SI and DI are named the source and destination index 
register, respectively. 



15 



The flags register is sixteen bits wide and consists 
of nine usable status bits for the processor. These include 
: zero flag(ZF), direction flag(DF), interrupt flag(IF), 
overflow flag(OF), and trap flag(TF). 

The BIU has the remaining registers : four segment 
register, CS , DS , SS, and ES . These stand for the code, 
data, stack, and extra segment register respectively, and 
one instruction pointer(IP). 

C. COMMUNICATION EXPANSION BOARD 

This expansion board is used to connect the multiple 
Z-100 computers and the printer to the single board computer 
of the Concentrator. We can connect from fifteen to twenty 
three Z-100 microcomputers with two or three BLC 8538 eight 
channel communication expansion boards. The BLC 8538 eight 
channel communication expansion board provides fully 
programmable synchronous of asynchronous serial communica- 
tion channels with RS232C interfaces to expand system serial 
communications capability. Each individual channel provides 
two interrupt requests with distinct priorities. The BLC 
8538 is compatible with all National Semiconductor Serial 80 
cardcages , back planes and microcomputer system bus 
structures . 

The universal synchronous and asynchronous receiver/ 
transmitter (USART ) control logic block gates the data on the 
data bus to the appropriate USART reset pins. Writing to 
the USART reset logic register resets each USART displaying 
a logic one on its corresponding data line. Two 74LS08 and 
gate devices gate the data bus to the appropriate USART 
reset pins. Data lines zero thru seven(DA0-DA7 ) are 
logically ANDed with the reset I/O line. Writing to the 
reset register causes each set data bit in the USART control 
logic to reset its corresponding USART. 
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A USART reset causes the following : 

a) Resets status bits to zero, 

b) Disables the transmitter and receivers, 

c) Clears any interrupt requests, 

d) Clears the mode, status and command registers. 

The USART' s function is to transmit eight (or less) bits 
of data on one signal wire in a serial fashion to another 
USART. The other USART assembles the serial bit pattern 
into an eight bit value transferrable to the data lines of a 
data bus of a computer. Each USART uses four address loca- 
tions : one as a data register, one as a control register, 

one as mode selection register, and one as a status 
register. The 2651 has nine 8-bit registers that can be 
written to and/or read from by the system CPU through the 
data bus D7-D0. The nine 8-bit registers are mode register 
1, mode register 2, command register, status register, 
SYN1/ SYN2/DLE registers, and transmit / receive data holding 
registers. 

The 2651 USARTs must be programmed by the system CPU 
before transmitting or receiving data. Programming the USART 
consists of four steps. First, the user should reset the 
USART. Second, the user writes to the Mode Register 1. On 
the third step, the user writes to the Mode Register 2. 
Finally, the user writes to the Command Register. 

The registers are described in detail below. 

1 . Mode Register JL 

This register sets the mode ( synchronous or asynchro- 
nous), parity use and type, character length, and other 
parameters. The register format is shown in Figure 2.3. In 
our program, the programming code will be 01001110B (4EH) . 
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2 . Mode Register 2 

This register sets the baud rate and the external/ 
internal characteristic of the transmitter and receiver 
clocks . The register format is shown in Figure 2.4. The 
programming code will be 00111110B ( 3EH) . 
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sync : 


sync : 
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bits 
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l=single 

syn 
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10 = 1 1 5 stop bits 
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lected. Factor is 16x if internal cl- 
ock is selected. 



Figure 2.3 Mode Register 1 Format. 



3 . Command Register 

This register controls the DTR (Data Terminal Ready) 
and RTS (Request to Send Data) outputs, operating mode, 
transmit control enable and receive control enable. The 
register format is shown in Figure 2.5. The command 
register can be written to, but not read from. The 
programming code will be 00000111B(07H) . 
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°oi?l:iS8o b S22d 
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1101=7200 baud 
1111=19200 baud 



Figure 2.4 Mode Register 2 Format. 

4 . Status Register 

The status register indicates the state of the TxRDY 
(Transmitter Ready Interrupt) and RxRDY (Receiver Ready 
Interrupt) outputs and the DCD (Data Carrier) and DSR (Data 
Set Ready) inputs. The register format is shown in Figure 
2.6. The status register can be read from, but not written 

to. If the Transmitter is ready, the code will be 

00000001B (01H) . If the Receiver is ready, the code will be 
00000010B(02H) . 

5. SYN1/ SYN2/DLE Registers 

If synchronous operation is chosen, these three 
registers must be loaded to provide characters for synchron- 
ization, idle, fill, and data transparency. The use of these 
characters is governed by the mode into which the USART is 
programmed. For example, bits 6 and 7 of Mode Register 1 
control the number of SYN characters used and the transpar- 
ency mode. These registers are not used in this 
application. 
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6 . Transmit /Receive Data Holding Registers 

These two registers share the same address. When 
transmitting, the system CPU writes a data word to the 
Transmit Data Holding Register so that it can be serialized 
and transmitted. When receiving, the system CPU reads from 
the Receive Data Holding Register to receive the data word 
that has been received and deserialized. The detail of 
USART can be found in [Ref. 10: pp . 3.7 - 3.16]. 
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Command Register Format. 
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Figure 2.6 Status Register Format. 
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III. SYSTEM SOFTWARE 



An operating system is any program or group of related 
programs whose purpose is to act as an intermediary between 
the hardware and the user of a computer. In the case of a 
small microcomputer application, the operating system may 
consist of little more than a set of service routines and a 
simple set of commands that allows the user to load or dump 
memory to or from an external storage device, to modify 
bytes, and to test application programs. 

A more sophisticated operating system may have a disk- 
controller interface and some form of memory management. The 
highest level of operating system includes such features as 
multiprogramming, bank- selected memory, a hard-disk 
controller interface, and random track-sector allocation. 
CP/M (Control Program for Microcomputers) is typical of a 
class of operating systems for the microcomputers currently 
in widespread use. 

This chapter describes the structure of CP/M-85 oper- 
ating system for the Z-100 microcomputers and some 
modifications to it. 



A. CP/M-85 OPERATING SYSTEM 
1 . General Discussion 

CP/M-85 operating system for the Z-100 microcomputer 
is divided into two software components: the "system kernel" 
and the "BIOS files". 

The system kernel is a set of programs that reside 
on the reserved system tracks of a disk. Special data 
transfer utilities (usually SYSGEN and/or MVCPM207) are used 
to copy the system kernel from one disk to another. The 
system kernel manages files, translates the commands you 
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enter at the keyboard, and performs other functions that do 
not depend upon specific hardware characteristics. 

CP/M-85 BIOS consists of two files, BIOS85.SYS and 
BIOS88.SYS, which reside on the file tracks of the disk. 
The portion of the BIOS stored in the file BIOS85.SYS uses 
the 8085 processor of the Z-100. The portion stored in 
BIOS88.SYS uses the 8088 processor of the Z-100. For 
further information on the CP/M-85, refer to [Ref. 7: pp 
1.9 - 1.10]. 



2 . Structure 

CP/M is logically divided into four parts, called 
the Basic I/O System (BIOS), the Basic Disk Operating System 
(BDOS), the Console Command Processor (CCP), and the 
Transient Program Area (TPA) . The memory organization of 
the CP/M system is in the Figure 3.1. 

a. Basic Disk Operating System (BDOS) 

The BDOS is responsible for all management 
functions including disk-file management, I/O high-level 
management, and all other function calls available to the 
user. The BDOS makes calls to the BIOS, which interfaces 
with the actual hardware environment of the microcomputer. 
For the detail of the BDOS functions , see [Ref. 12: p. 140]. 
and [Ref. 8: pp . 124 - 125]. 

Our SPOOL program will use some of the BDOS 
functions : List Output, Make File, Write File, Close File, 
and so on. The List Output function is activated by pressing 
Control-P key, which copies everything that appears on the 
screen to the printer. 

Access to a file on the disk is done through an 
File Control Block (FCB). An FCB is supplied for each file 
the user wishes to access. The detailed description of FCB 
is found in [Ref. 8: pp. 93 - 94]. 
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b. Basic I/O System (BIOS) 

The BIOS is a hardware -dependent module that 
defines the exact low level interface with a particular 
computer system that is necessary for peripheral device I/O. 
The BIOS is a collection of user-written subroutines for 
primitive character I/O and disk access. Disk functions 
include: set DMA address, set track and sector, read sector, 
write sector and so on. A series of jump vectors is located 
at the head of the BIOS and points to all internal subrou- 
tines. The BDOS locates subroutines in the BIOS by calling 
the subroutines at the known location in the jump vector 
area . 



c. Console Command Processor (CCP) 

When CP/M becomes active, it gives control to 
the CCP, which, is actually an application program loaded at 
the top of the TPA. When first entered, the CCP displays a 
prompt character, 'A>’. This indicates which disk drive is 
currently logged in for use. To change drives, the user 
simply enters the drive name and a colon (for example, B:). 
This causes the CCP to request the BDOS function call 
"select disk," with register E containing a number repre- 
senting the requested drive (A=l, B=2, and so forth). There 
are five built-in commands: TYPE, DIR, REN, ERA, and SAVE. A 
number of transient commands are also provided: SYSGEN, 
PIP, ED, ASM, DUMP, LOAD, STAT, MOVCPM, SUBMIT, and DDT. 
These commands are actually .COM files or memory image 
files. For the detail of the CCP operation, see [Ref. 12: 
pp. 148 - 149] . 
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d. Transient Program Area (TPA) 

The TPA is an area of memory (i.e., the portion 
that is not used by the FDOS and CCP) where various nonresi- 
dent operating system commands and user programs are 
executed. The lower portion of memory is reserved for 
system information. For the detail about the memory organi- 
zation, see [Ref. 8: pp 89 - 90 ] . 









FBASE : 


FDOS (BIOS + BDOS) 




CCP 


D900H 


CBASE : 


TPA 






TBASE : 

pnnT . 


OlOOH 

OOOOH 


System Parameters 


dUU 1 . 





Figure 3.1 Memory Organization of CP/M. 
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B. MODIFICATION TO CP/M-85 BIOS 

Since the SPOOL utility program uses the List Output 
function as described in the previous section, we should 
intercept some point of the List Output function routine in 
BIOS. The BIOS85.SYS file could be modified by using the 
DDT debugging utility. 

The BIOS entry point of List Output function is located 
at F93DH. This is shown in the Figure 3.2 a. We patch this 
point so that the List Output function pass through a 
certain intercept program in the TPA area to the BIOS. It's 
necessary to place the intercept routine at an area of the 
TPA that is near to the BIOS. Since the BIOS starts from 
D900H, we place the interrupt program at D800H. The inter- 
rupt program is contained in the SPOOL utility program. When 
the user activates the SPOOL program, the intercept routine 
is also loaded at D800H. 

The List Output function is activated by pressing the 
Control-P key. When the user press the Control-P key, every- 
thing on the screen is catched and loaded into E register 
and then sent to the printer. The intercept routine is 
intended to intercept the character in E register and 
provide the SPOOL utility program with that character. The 
detail of this mechanism is discussed in the next chapter. 
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F93D MVI A, 05 



F93F JMP F99C 

F942 MVI A, 06 

(a) Original Entry Point of BIOS 

F93D JMP D800 
F940 NOP 
F941 NOP 
F942 MVI A, 06 

(b) Modified Entry Point of BIOS 



Figure 3.2 Entry Point of List Output Function. 
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IV. IMPLEMENTATION OF THE SYSTEM 



This chapter describes the structure of the 
Concentrator, the connection between the Concentrator and 
Z- 100's, and the logic designs of three processes. In the 
last section of the chapter, we address the integrated oper- 
ation of the processes. 



A. STRUCTURE OF THE CONCENTRATOR 

The structure of the Concentrator is shown in Figure 
4.1. The Concentrator consists of one iSBC 86/12A single 
board computer and three BLC 8538 eight channel I/O expan- 
sion boards. They are connected to the MULTIBUS so that the 
single board computer could access any channel of the three 
expansion boards. Since each expansion board has eight 
channels, the Concentrator can have twenty four channels. 
Each channel of the expansion board could be connected to 
one peripheral device. Therefore, the Concentrator can 
control twenty four peripheral devices. In our design, the 
printer is connected to the Channel zero, and the other 
twenty three channels are connected to the TTY ports of 
Z-100's. Each channel is associated with a Universal 
Synchronous Asynchronous Receiver Transmitter (USART) , which 
contains four registers: Data, Status, Mode 1, Mode 2, and 
Command registers. The details about programming the USART 
are in the Chapter 2. For more information about the address 
assignment of the registers, see [Ref. 10: pp . 3.3 - 3.11]. 
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Figure 4.1 Structure of the Concentrator. 
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B. BOOT PROCESS 



The function of the BOOT process is to download the 
CONTROL process from any Z-100 into the RAM of the single 
board computer. The logical flow of the BOOT process is 
shown in Figure 4.2 and the algorithm of the BOOT process is 
in Figure 4.3. When the Concentrator is turned on, the BOOT 
process inside the EPROM of the iSBC 86/12A starts to check 
the status ports of the multi-channel expansion boards in a 
round robin fashion to check if a Z-100 is turned on or not. 
Since the CONSOLE of Z-100 is assigned to the TTY port, the 
Z-100 will send a message terminating with ’A>' to the dedi- 
cated port of the expansion board when it is turned on. The 
BOOT process will send a command 'TYPE A : CONTROL . CMD ' to. 
down- load the CONTROL process when it reads in the 'A>'. 
Then, the Z-100 will send the CONTROL.CMD file to the 
Concentrator while the BOOT process reads in the file and 
stores it in the RAM. Because the TYPE function of the CP/M 
operating system stops printing the file when it meets a 
Control-Z .character , we have taken another character, the 
percentage , to signal the end of file. 

On the completion of downloading the CONTROL.CMD file, 
the CONTROL process is executed. The CONTROL process issues 
the reset command ' STAT CON:=CRT:', which changes the 
CONSOLE device from TTY to CRT. Then, 'A>' will appear on 
the screen of the Z-100 and the user of the Z-100 can do his 
work. From now, the CONTROL process starts to communicate 
with the printer and the multiple Z-100 microcomputers. The 
program listing of the BOOT process is in APPENDIX A. 

C. CONTROL PROCESS 

The function of the CONTROL process is to control the 
printer and multiple Z- 100's and to connect the printer to 
any one of the multiple Z- 100's at a time so that the data 
could be transferred from Z-100 to the printer. The purposes 
of the CONTROL process are: 

1) To allow use of the printer for any connected Z-100. 
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Go to CONTROL process 



Figure 4.2 Logical Flow of BOOT. 
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Algorithm of BOOT Program 

***** Initialization ***** 

Initialize the USARTs 

Set PORTNO with the first status port 

***** BOOT Part ***** 

Repeat 

Read the status port given by PORTNO 
If the port is Receive-ready 

then read a character from the data port 
If the character is ’>’ 

then go to ISSUECOM part 
else store the next status port into PORTNO 

Until the control is sent to the ISSUECOM 



***** ISSUECOM Part ***** 

Set the command string with ’TYPE A:CONTROL.CMD’ 
Call COMMAND 

***** TRANSFILE Part ***** 

Repeat 

Read a character from the data port 
Store the character into the new code area 
Until the character is 
Execute the CONTROL program 

***** Subroutine COMMAND ***** 

Send the command string to the Z-100 



Figure 4.3 Algorithm of BOOT. 
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2) To permit any Z-100 to be activated, even during the 

time that the printer is in use. 

The logical flow of the CONTROL process is shown in Figure 
4.4 and the algorithm of the CONTROL process is in Figure 
4.5. 

The CONTROL process is stored in CONTROL . CMD file of all 
Z-100's. The CONTROL.CMD file, however, is downloaded into 
the RAM of the single board computer when the Concentrator 
and the first of the Z-100 's is turned on. The CONTROL 
process is composed of two states: the control state and the 
transfer state. The CONTROL process lies in one of two 
states at a time. When the CONTROL process is in the 
control state, it checks the status ports of the multi- 
channel expansion boards in a round robin fashion to see if 
any boot or print request is issued from a Z-100. If a 
channel has a request, the CONTROL process reads in the 

character from the data port of the channel. The character 
sequence 'Q' means a print request and ' A>' means a boot 
request. On receiving the character 'Q'j the CONTROL 
process sends a confirm character 'Y' to the Z-100 and then 
goes to the transfer state. In the transfer state, the 
CONTROL process receives a character from Z-100 and sends it 
to the printer using a software handshaking method. The 
CONTROL process checks all the other ports whenever one 
hundred and twenty eight characters are sent to the printer 
to know if they want to boot-up. For every port which wants 
to boot-up, it issues the command 'STAT CON:=CRT:', and then 
continues to print the characters in the transfer state. 
After that, the Z-100 which has received the reset command 
can work its own job. The CONTROL process stops its 
transfer of data between the Z-100 and printer when it reads 
in a Control-Z (end-of-f ile) character, and then enters the 
control state to check the next status port. 

When the CONTROL process reads in 'A>' in the control 
state, it issues a reset command ’STAT CON:=CRT:' because 
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Figure 4.4 Logical Flow of CONTROL. 
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Algorithm of CONTROL Program 

***** Initialization ***** 

Set PORTNO with the first status port 
Call RESET 



***** CONTROL Part ***** 

Repeat 

Read the status port given by PORTNO 
If the port is receive-ready 
then read a character from the data port 
If the charater is ’>’ 
then call RESET 
else if the character is ’Q’ 
then go to TRANSFER 
else store the next status port into PORTNO 
Until the system control is sent to the TRANSFER 



***** TRANSFER Part ***** 
Repeat 

Read a character from the data port of Z-100 
Send the character to the printer port 
Call BCHECK on every 128 characters 
Until meet the End-Of-File mark ’ ~ Z’ 

Go to CONTROL 



***** Subroutine COMMAND ***** 
Send the command string to the Z-100 



***** Subroutine BCHECK ***** 

Check all other status ports once 

For each port which has the boot-up request 



call RESET 



Figure 4.5 Algorithm of CONTROL. 
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there is no need for downloading the CONTROL.CMD file. On 
receiving other characters than 'Q' or 'A>', the CONTROL 
process ignores them and goes to the next port to check. 

Program listing of CONTROL process is in APPENDIX B. 

D. SPOOL PROCESS 

The SPOOL process has three functions. It also has the 
intercept routine for intercepting the List Output function 
of the BIOS. The intercept routine is really a part of the 
List Output function of the BIOS. The intercept routine 
receives the control from the List Output function and calls 
the SPOOL program, and then returns the control back to the 
List Output function of the BIOS. The mechanism between the 
List Output function and the SPOOL program is explained 
below . 

The SPOOL process has three options, they are: 

1. Send the characters on the screen of a Z-100 directly 
to the printer. 

2. Save the characters on the screen of a Z-100 into a 
disk file. 

3. Print any existing disk file. 

The logical flow of the SPOOL process is shown in Figure 4.6 
and the algorithm of the SPOOL process is in Figure 4.7. 

The user can select any one of the above options by 
typing in the appropriate digit corresponding to the selec- 
tion. Each function is implemented with a pair of modules: 
Set and Path. Function 1 is composed of Setl and Pathl , 
Function 2 is composed of Set2 and Path2 , and Function 3 is 
of Set3 and Path3 . 

The entry point on the head of the SPOOL program is 
composed of a selection routine which jumps to one of 3 Path 
modules depending on the user's selection number. 
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Figure 4.6 Logical Flow of SPOOL. 
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1. Function 1 



Function 1 sends the character on the screen 
directly to the printer through the Concentrator in Ctrl-P 
mode. When the user selects Function 1, Setl module sets 
the buffer pointer with its own buffer address and the path- 
flag with number one. Then the buffer pointer contains the 
starting address of the buffer whose size is 128 bytes and 
the path- flag contains number one. On the completion of 
setting the buffer pointer and path-flag, Function 1 comes 
out to the CCP level, printing a message that user should 
press the Ctrl-P key and go ahead. As the user hits Ctrl-P 
key, the List Output routine calls the address of entry 
point (D000H) of the SPOOL process whenever a character is 
typed in. Since the path- flag is set with number one, Pathl 
is then activated. Pathl reads in the character in the 
register E which is captured by the List Output function, 
and then sends the character to the Concentrator. The 
Function 1 returns the control back to the List Output func- 
tion. Function 1 repeats this process until the user hits 
the Ctrl-Z key. When the user hits the Ctrl-Z key, Function 
1 comes out to the CCP level. 

2 . Function 2 

Function 2 is similar to Function 1 except that 
Function 2 saves the character in a disk file while Function 
1 sends the character to the printer directly. When the 
user selects Function 2, Set2 module sets the buffer pointer 
with the buffer address and the path- flag with number one. 
Set2, also, reads in user- specif ied file name. If, however, 
user does not specify his/her own file name, default file 
name (TEMPFILE . $$$ ) is used. On the completion of setting 
the buffer pointer, path-flag, and reading in the file name, 
Function 2 comes out to the CCP level, printing a message 
that the user should press the Ctrl-P key and go ahead. As 
the user hits Ctrl-P key, the List Output routine calls the 
address of entry point, which activates Path2 . Path2 reads 
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Algorithm of SPOOL 

***** Initialization ***** 

The user selects one of the three options 

Go to the corresponding SET module 

Each SET module goes to the coresponding PATH module 



* * * * * 



PATH 1 



Repeat 

Read a character from the Z-100 
Store the character into the buffer 
Send the character to the printer 
Until it meets the End-Of-File mark ’ 'Z’ 
Go to the CCP level 



***** PATH 2 

Call READNAME 






Repeat 

Read a character from the Z-100 
Store the character into the buffer 
Until it meets the End-Of-File mark 
or the buffer limit 
Make a File 
Write the file 
Close the file 
Go to the CCP level 



V 



***** PATH 3 ***** 

Call READNAME 
Repeat 

Read a record from the file 
Send the record to the printer 
Until it meets the End-Of-File mark ’ * V 
Go to the CCP level 



***** Subroutine READNAME ***** 
Read a file name from the console 



Figure 4.7 Algorithm of SPOOL. 
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in the character in register E which is captured by the List 
Output function, and then store it in the buffer while the 
buffer pointer is incremented. And then Function 2 returns 
the control back to the List Output function. Path2 repeats 
this process until the user hits the Ctrl-Z key. Path2 
stores the Ctrl-Z character on the end of the buffer when it 
meets the Ctrl-Z character. After that, Path2 makes a file 
and write the file with the content of buffer by one 
record(128 bytes) at a time. We use 2 pointers, the write 
pointer and the buffer pointer, during writing the file. 
Buffer pointer points to the address of the last character 
in the buffer while write pointer is set with the starting 
address of the buffer. Whenever a record is written in the 
file, the write pointer is increased by 80H. Write process 
is done when the write pointer becomes greater than the 
buffer pointer. Since the buffer size is not large enough 
for a big file, when the buffer pointer exceeds the limit 
Function 2 will issue a message that the buffer is full and 
the user may take an action to reset the pointers. 

3 . Function 3^ 

Function 3 reads a file whose file name is given by 
user and sends the contents of file to the printer through 
the Concentrator. Function 3 reads in one record of the 
file at a time and repeats this until it meets the Ctrl-Z 
character. The buffer is the same one of Function 1. Once 
reading one record into the buffer, Function 3 sends the 
content of buffer one byte at a time to the printer thru 
Concentrator. Function 3 does not need the Ctrl-P function 
while function 1 and 2 use it. Program listing of SPOOL 
process is in APPENDIX C. 
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V. CONCLUSIONS 



The primary goal of this thesis was met. The CONTROL 
process was designed for the communication with the multiple 
Z-100 microcomputers and the printer, and this is success- 
fully integrated into the Printer Multiplexing System with 
the SPOOL utility program. The BOOT process was designed 
for downloading the CONTROL process from any one of the 
Z- 100's, which eliminated the need for the disk drive, 
console and/or additional EPROM to store the CONTROL 
process . 

This system allows use of the printer for any connected 
Z-100, permits interactive use of the printer to one user 
when nobody else is waiting to use it, and enables the 
effective interactive sharing of the printer among multiple 
users by spooling any character on the screen into a disk 
file for later batch printing. 

Future research involving the Printer Multiplexing 
System should develop the 8086 code of the SPOOL utility 
program so that the users could use the SPOOL in the envi- 
ronment of CP/M- 86 or MS-DOS. The BOOT and CONTROL 
processes are already written in the 8086 code. 

Additionally, we are expecting that this system could be 
integrated into the Ethernet. Then the CONTROL process 
should be expanded to contain the Ethernet protocol program. 



41 



APPENDIX A 



USER MANUAL FOR PRINTER SHARING 

A. SYSTEM CONFIGURATION 

The Printer Sharing system consists of one iSBC 86/12A 
single board computer, three BLC 8538 I/O expansion boards, 
the multiple Z-100 microcomputers, and the printer. The 
detail about the iSBC 86/12A single board computer and the 
BLC 8538 I/O expansion boards can be found in the Chapter 2. 



B. ACTIVATING THE SYSTEM 

Turn on the Concentrator before any Z-100 microcomputer 
is turned on. The user should keep this power-up procedure 
because the BOOT program needs to initialize the USART 
before checking the ports of the I/O expansion boards. At 
this time, the CONSOLE device of the Z-100 is normally 
assigned to the teletype port. Otherwise, the user should 
change 1 the CONSOLE device of the Z-100 computer to the tele- 
type port manually. And then, the CONTROL.CMD file in drive 
A is down- loaded into the RAM of the single board computer. 
When the CONTROL program begins to execute, it changes the 
CONSOLE device to the standard device CRT. Then, the Z-100 
user can do his own work on the computer. 



C. USING THE SPOOL PROGRAM 

To use the printer, the user should type 'SPOOL' in the 
CCP level. Then there appears a guidance about the three 
options of the SPOOL program on the screen. The user can 
select any one of the three options by typing in the corre- 
sponding number of that option. The three options are 
listed below. 
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1. Interactive Print 



When the user selects option 1, he can use the 
printer interactively. After the user press the Ctrl-P key, 
everything on the screen is copied to the printer through 
the Concentrator. This option ends when the user press the 
Ctrl-Z key. 

2. Saving on a Disk File 

When the user selects option 2, he can save the 
characters on the screen on the disk file. The user is 
asked to type in the file name. If the file name is not 
typed in, the default file name (TEMPFILE . $$$ ) is used. 
After the user press the Ctrl-P key, everything on the 
screen is saved in the buffer. If the buffer size exceeds 
the limit, a warning message appears on the screen. In 
this case, the user should take an action as directed on the 
screen. This option ends when the user press the Ctrl-Z 
key, writing the buffer into the disk file. 

3 . Printing Existing Files 

When the user selects option 3, he can print any 
existing file. The user is asked to type in the file name 
the user wants to print. After a file is printed out, 
another file can be printed continuously if the user wants 
to do . 
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APPENDIX B 



BOOT PROGRAM 



***** ***** ^**» *** *** *** **# %** *** ■ 



BOOT PROGRAM 



Dec 1985. By Choi and Lee 



BOOT program reads in the status ports of the I/O expansion 
boards in a round robin fashion. If there is a boot request 
on the port, the BOOT program down- loads the CONTROL.CMD 
file from the Z-100 microcomputer. And then, the BOOT 
prgram sends the control to the CONTROL program. 



cseg 

org 0 



^ ^ ^ % t # ^ ^ ^ % l # % f # ^ ^ ^ % » # % » # % t # % f # ^ ^ 

#% /\ #% A A A A ^ A #%/%/« «« #% #% #% ** A #% A A A 



* . INITIALIZATION * 

V a 1 V V #% V X W #f #\ X /%#?#%#%/%/% #%#%#% X V #% #C #% #f a*^% 

Initialize the USART and a variable which contains 
the port number. On the completion of initialization, the 
control goes to the BOOT process. 



mov 


al , Of fh 


out 


OaOh, al 


mov 


dh , 0 


mov 


dl , 82h 


mov 


al ,4eh 
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call 


init 


mov 


dl , 82h 


mov 


al , 3eh 


call 


init 


mov 


dl , 83h 


mov 


al , 07h 


call 


init 


mov 


portno , 85h 


mov 


dh, 0 


^%/\/\/\#%/\#%#\#\/\/\/\/\/\/\/\/\ 
/\ /\ /\ /\ /% O 


m /i 0% 0% /\ 0% 0% 0% 0\ 0% 0% 0% 0% 0% 0% 0 % 0\ 0% 0\ 0\ 0* 0\ 0\ 0\ 0S, 

BOOT PART * 

0\ 0% 0% 0% 0% 0\ 0+ 0% 0 \ 0 % 0% 0% 0 \ 0% 0 \ 0 \ 0% 0 % 0% 0% 0% 0% 0% 0% 0* 0% 0 % 0 \ 0% 0% 



Receives ' > ' character from any one of the multiple Z-100 
microcomputers and then downloads the CONTROL.CMD file to 
the memory of iSBC 86/12A. On the completion of loading the 
file, it transfers the control to the CONTROL program. 

load DL reg with port number 
read the status of the port 
receive ready? 
if not go to next port 
get the data port 
read in the character from Z-100 
get the status port 
compare the character with ' >’ 
this Z-100 is not booted up, 
go to nextport 
go to ISSUECOM process 

get the next status port 
check if out of range 



boot 



mov 


dl , portno 


in 


al , dx 


and 


al , 02 


jz 


nextport 


dec 


dx 


in 


al , dx 


inc 


dx 


cmp 


A 

1— 1 


jnz 


nextport 


jmp 


issuecom 


add 


dl , 4 


cmp 


dl , OAOh 
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jbe 



bypassl 



;if inside the range, come along 
;the normal path 





mov 


dl , 85h 


; if out 


of range, set DL reg with 








; the 1st 


status port 


bypassl : 


mov 


portno , dl 


; store 


addr of next status port 








; in the 


variable . 




jmp 


boot 


; repeat 


checking the status ports 


• /»/*/» /? #f *» /\ *» 
3 

• /» 

3 


%*<» 

*% A A 


/C 

ISSUE 


COMMAND 


• %*# %*# %*# 

PART * 


• A A A /\ A A *\ /% A A A A 

J 

; Issue the command "TYPE A 


A A A A A A A 

: CONTROL. 


* *% #% A #% /% #% #% 

CMD" to the Z-100 


issuecom : 


mov 


si , 0 




;set counter with 0 




mov 


bx, offset 


storage 


;set base reg with addr 










;of command string 




call 


command 




;send the TYPE command 



* TRANSfer control.cmd FILE * 

v# %*# %*# %*# %*# %*# %*# %*<• v# w %*# %*# %*# %*# %*# *> %% %*# %% v# W %*# v# %** %*# v-» %> **-• w %> ^ 

/% /% /\ M /% A /% A O A #% A A «« «« A A A A #« A A A A /% #% #% #% *\ #% #% #* A #\ #% #\ A #% *% #% A #% /% #% #% #% *% 

Download the control.cmd file from Z-100 to the memory of 
iSBC 86/12A. On the completion of downloading the CONTROL 
file, the TRANSFILE sends the control to CONTROL program. 



transfile : mov 



mov 



bx, offset newcode 
si , 0 



;set base reg with addr 
;of newcode area 
;set counter with 0 



nextchar: in al,dx 
and al,02 



; read in status port 
; receive ready? 
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jz 


nextchar 


;if not, read again 


dec 


dx 


;get data port 


in 


al , dx 


;read a char from Z-100 


cmp 


al , 19h 


; compare with temporary Ctrl-Z 


jnz 


bypass 2 


;if not, come along normal path 


inc 


al 


;recover Ctrl-Z to 1AH 


bypass2: mov 


(bx+si ) , al ; 


store char in new code area 


cmp 


al, ’%' 


; compare with end of file 


jz 


adjust 


;go to adjust 


inc 


si 


; increase counter 


inc 


dx 


;get status port 


jmp 


nextchar 





• /> O /\ 

3 

3 ” 






/%/% M O O /\ M M M #% #\ 

ADJUST * 


3 

; Reads in 


the 


prompt 


o o ^\ /\ /\ /\ /\ /^ /\ /\ r\ /\ />/% /\ /%#%#% 

character ' A>' from Z-100, and then 


; goes to 


the 


CONTROL program. 


adjust : 


inc 


dx 


;get the status port 




mov 


cl , 4 


;set the counter 


statinl: 


in 


al , dx 


; check if receive ready 




and 


al , 02 






jz 


statinl 






dec 


dx 


;get the data port 




in 


al , dx 


;read a char from Z-100 




inc 


dx 


;get the status port 




dec 


cl 


;decrease the counter 




jnz 


statinl 


;if not done, read again 




jmp 


newcode 


+ 132h ; execute the CONTROL process 
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subroutine 



Initialization 





^ ^ 

*\ *\ r% *\ *\ *\ r% r\ 


^ ^ ^ ^ 
A A A 


mP<0 ^ ^ C# C# %*# C# ^ ^ ^ ^ ^ %*# %*# «An < 

A A A A A A A A A A A A A A #% A A #% A A A A A A A A A #% 4\ A A 


initialize the 


USART . 




init : 


out 


dx, al 


;write programming code to USART 




add 


dl , 4 


;get the next port 




cmp 


dl , OAOh 


; check if out of range 




jbe 


init 


;if not, write to the next port 




ret 






• V 
3 

• * 

3 

A %*# %*# 


^ 


VC ^ *a VC VCVC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VCVC VCVC VC VC VC VC VC VC VC VC VC VC ' 

subroutine COMMAND 

C# %*# «Ap %*# %*# %*# « 


3 

; Sends 


the command string to the Z-100 


command 


: in 


al , dx 


; check if transmit ready 




and 


al , 01 






J*z 


command 






mov 


al,(bx+si) ;move a char from command string 




dec 


dx 


;get data port of Z-100 




out 


dx , al 


; send char to Z-100 




inc 


dx 


;get status port 




cmp 


al , Odh 


; compare char with end_of_string 




jz 


eocom 


;if matches, end of command 


statin: 


in 


al , dx 


; check if receive ready 




and 


al , 02 






jz 


statin 






dec 


dx 


;get data port of Z-100 




in 


al , dx 


;read a response from Z-100 




inc 


dx 


;get status port 




inc 


si 


increase counter 
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eocom: 




newcode : 




storage 



portno 



jmp 


command 


;send another char 


in 


al , dx 


; check if receive ready 


and 


al , 02 




jz 


eocom 




dec 


dx 


;get data port of Z-100 


in 


al , dx 


;read a response from Z 


inc 


dx 


;get status port 


ret 








/\ /\ A 

NEW 

A A A 


A ** 0% 0\ 0\ 0% 0% 0% 0% 0% 0\ 0% 0% 0\ A 0\ 0\ 0\ 0\ 0\ 0% 0\ 0\ 0 % 0\ 

CODE AREA 

^ ^ ^ ^ ^ « 

/% 0\ 0\ 0\ A 0% 0% 0% 0% A A A A A 0\ 0\ 0\ 0\ 0 % A 0\ 0\ 0\ 


***** 


Vr V'T Vr 

DATA 


^ <k^ ^ ^ V# W %> « 

/% A 0\ 0\ 0S 0% 0% 0\ 0\ 0\ 0\ 0\ 0\ A 0\ 0 % 0 % 0\ 0\ 0\ 0\ 0 % 0\ 0\ 

STORAGE AREA 

*k f > ^ ^ %*# ^ < 

A A /\ /\ A /« /\ A A A 0\ 0 % A 0\ 0\ 0\ 0 % 0% *\ *\ *\ 


dseg 






org 


300h 




db 


'type a: 


control . cmd ' 


db 


Odh 




db 


0 





end 
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APPENDIX C 



CONTROL PROCESS 



^ % t # J # % t # J # ^ J # J # % l # % f # J # % t # J # % t # % f # J # ^ J # J # J # J # J # J # J # J # J # J # % l # 

#% A A A A O O /\ /\ #% A /\ /\ /% /\ #% /> /\ /\ /% /\ #% #% #% #% A /% #% A #% A A A 



CONTROL PROGRAM 
Dec 1985. By Choi and Lee 



CONTROL program communicates with the printer and 
Z-100 microcomputers. The CONTROL program resides 



; the control state . 




cseg 




prtdata 


equ 


80h 


prtstat 


equ 


81h 




org 


0 



multiple 
in either 



VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC 



INITIALIZATION 



VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC 



mov 

mov 

call 



portno+20eh , 85h 

dh, 0 

reset 



;set the port # to 85h 
;set DH to 0 

; let the Z-100 CONSOLE gain 
; control 
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CONTROL PART 



5 


****** 


#C V /f W Vf V? /C 


« VTX VC VC* VC VC VC VC VC VC VC VC" VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC " 


control : 


mov 


dl ,portno+ 


20eh ; load DL reg with 1st port 




in 


al , dx 


;read the status port 




and 


al ,02 


; check if any request is out 




jz 


nextport 


;if no, go to the next port 




dec 


dx 






in 


al , dx 


;read the data port 




inc 


dx 






cmp 


al , ' Q ' 


;verify the request 




jz 


transfer 


;enter transfer state 




cmp 


al, ’>' 






jnz 


nextport 






call 


reset 


; issue a reset command 


nextport : 


add 


dl , 4 


;get the next port 




cmp 


dl,0a0h 


; check if out of range 




jbe 


bypassl 


; if not, come along normal path 




mov 


dl , 85h 




bypassl : 


mov 


portno+20eh, dl ;store the increased port # 




jmp 


contro 1 




• A /\ /\ /\ /\ /\ /« /% 
> 

• X 
> 


M 


A /\ /> O O /\ /> /> #% /\ /\ M A A A #\ #% #% 

TRANSFER PART 


5 " “ ” " ^ ~ ^ 

transfer : 


in 


/\ /\ /\ A #« #% A #% 

al , dx 






and 


al , 01 






jz 


transfer 






mov 


al, ’Y' 


;send "yes" character to Z-100 




dec 


dx 






out 


dx, al 
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mov 


cl , 80h 


;set the char counter with 128 




return : 


inc 


dx 






statinl : 


in 


al ,prtstat 








and 


al , 01 








jz 


statinl 






statin2 : 


in 


al , dx 








and 


al , 02 








jz 


statin2 








dec 


dx 








in 


al , dx 


;read in the data of Z-100 






inc 


dx 


;get the status port 






cmp 


al , 19h 


; compare with Ctrl-Z(IAH). 1AH 


is 








; temporarily changed because TYPE 








; function stops printing at Ctrl 


-z 




jz 


eotrans 


; i f so, go to end of transfer 






out 


prtdata , al 


; send the data to the printer 




statin3 : 


in 


al , dx 








and 


al , 01 








jz 


statin3 








dec 


dx 








mov 


al, 'A' 


;send an 'Acknowledge' 






out 


dx , al 








dec 


cl 


; decrease the char counter 






jnz 


return 








call 


bcheck 


; check all other ports to know 
; there is any boot-up request 


if 




jmp 


return 
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•V ^ ^ ^ ^ ^ ^ ^ ^ *»^ ^ ^-» %** ^ ^ ^ %*# %*# %*# %*# %*# %*# %*4 ^ ^ ^ +J+ ^ *»^ %*# *»*-• %*# %*# ^ 

ft #\ O ft #% A #%«> M f« #\ f« #% O O />/% A f« ^ A #% O #\ ^ «> /\ /«#% #\ #%#«#%#%#%#%#« O ** *\ *% *% *% r% 

* END OF TRANSFER * 

^V ^ ^ ^ *|^ ^jf ^V ^ ^ ^ %*# ^ ^ %^i %Vi mftm %*# %*# %^i mP+ %*# A 

O /\ /^ O A A /«/«#% A A A A A A A O /%/%#% A #\ #\ #« #\ #\ /> /\ #* 

End of Transfer sends the ending signal to the Z-100 and 
a carriage return and a line feed character to the printer, 
eotrans : 



stating : 



statin5 



in 


al,dx ; check 


if Z-100 is transmit ready 


and 


T— 1 

o 

f— 1 




jz 


eotrans 




mov 


al , ' Z ' ; load 


AL reg with ending signal 


dec 


dx ;get data port 


out 


dx,al ;send 


ending signal to Z-100 


in 


al ,prtstat ; check 


if printer is ready 


and 


al , 01 




jz 


statin^ 




mov 


al,0dh ;send 


a carriage return to printer 


out 


prtdata,al 




in 


al , prtstat ; check 


if printer is ready 


and 


al , 01 




jz 


statin5 




mov 


al,0ah ;send 


a line feed to printer 


out 


prtdata, al 




jmp 


control 




?☆■**** 


**\ *a /\ /\ 'CVC #f W W W 

subroutine 


vc y% ** *}% y% **% vc 

RESET * 




vf yc vr y% v? #f 


1 %% »k% %*# 

/% A *\ *% *\ *% *\ *\ *\ *\ *\ /\ #% #« #% #% #% #% #\ #\ /\ #% /\ 



RESET subroutine issues the command ’ STAT CON:=CRT:' to the 
Z-100. 



reset : 


mov 


si , 0 




mov 


bx, offset storage+20eh 




call 


command 




ret 
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subroutine 



COMMAND 




; Sends the command string to the Z-100 



command : 



statin6 : 



eocom : 



in 


al , dx 


and 


al , 01 


jz 


command 


mov 


al , (bx+si) 


dec 


dx 


out 


dx , al 


inc 


dx 


cmp 


al , Odh 


jz 


eocom 


in 


al , dx 


and 


al ,02 


jz 


statin6 


dec 


dx 


in 


al , dx 


inc 


dx 


inc 


si 


jmp 


command 


in 


al , dx 


and 


al , 02 


jz 


eocom 


dec 


dx 


in 


al , dx 


inc 

ret 


dx 



; check if transmit ready 



;move a char from command string 
;get data port of Z-100 
;send char to Z-100 
;get status port 

; compart char with end_of_string 
;if matches, end of command 

; check if receive ready 



;get data port of Z-100 
; read a response from Z-100 
;get status port 
; increase counter 
;send another char 



; check if receive ready 



;get data port of Z-100 
;read a response from Z-100 
;get status port 
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subroutine BOOTCHECK 



• * 

3 

%*<» %% %% 


JU J|# JU 


subroutine BOOTCHECK * 

%*•# %% «k^ J# 


3 " " " ^ ” 

; Checks 


all the 


other 


status ports to know if there is a 


;boot-up 


request 


from the 


Z-100. For each port which has 


;a boot-up request , issues 


a reset command. 


bcheck: 


inc 


dx 


; get the current status port 




mov 


ch,dl 


; store it in CH register 




mov 


dl , 85h 


; starts from the first port 


ncheck: 


cmp 


dl , ch 


; check if the port is itself 




jnz 


bypass3 






add 


dl ,4 




bypass3 : 


cmp 


dl , OaOh 


; check if out of range 




ja 


eocheck 


;if yes, end of checking 




in 


al , dx 


;read the status port 




and 


al , 02 


; check if any request is out 




j z 


nextportl 


;if no, go to the next port 




dec 


dx 






in 


al , dx 


;read the data port 




inc 


dx 






cmp 


al, ’>’ 






jnz 


nextportl 






call 


reset 


; let Z-100 console gain control 


nextportl 


: add 


dl ,4 


;get the next port 




jmp 


ncheck 


; check if out of range 


eocheck: 


mov 


dl , ch 


; recover the current status 




dec 


dx ; port 






mov 


cl , 80h 


; reset the char counter 




ret 
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DATA STORAGE AREA 



> 



5 " ~ ' w * ~ 


dseg 






org 


100 


portno 


db 


0 


storage 


db 


’ stat con: =crt : ’ 




db 


Odh 




db 


'V 




db 


lah 




end 
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APPENDIX D 



SPOOL PROCESS 



^ ^ %•# %•# %•# 



U ^ %*# %% ^ %* 



%*# %®# %*# %*# %*# 



SPOOL PROGRAM 



#% M /% #\ S« ** 



Dec 1985. By Choi 



and 



Lee 



SPOOL program 
the char into 
also contains 
char in the E 



has three options : print interactively, save 
a disk file, and print any existing file. It 
the intercept routine for intercepting the 
register in the Ctrl-P mode. 



DECLARATION PART 



conin 


equ 


i 


printf 


equ 


9 


readconf 


equ 


10 


openf 


equ 


15 


closef 


equ 


16 


readf 


equ 


20 


writef 


equ 


21 


makef 


equ 


22 


setdmaf 


equ 


26 



; console input char 

;print string 

;read console buffer 

; open file 

;close file 

; read file 

;write file 

; make file 

;set DMA address 
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eof 


equ 


lah 


;end_of_file character 


tty stat 


equ 


0e9h 


;TTY status port 




ttydata 


equ 


0e8h 


;TTY data port 




boot 


equ 


OOOOh 


;warra boot entry 




bdos , 


equ 


0005h 


;bdos entry 




f cb 


equ 


005ch 


;default file control 


block 


dbuf f 


equ 


0080h 


; default DMA address 




wrptr 


equ 


607ch 


;write buffer pointer 




pointer 


equ 


607eh 


•.temporary DMA buffer 


pointer 


tdma 


equ 


6080h 


•.temporary DMA buffer 


address 



VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC 



• VC 

> 




INITIALIZATION * 


• M /\ <r\ 

org 


lOOh 


► /% /V S* ** 


call 


init 




org 


OdOOOh 




entry : 


; entry 


point of SPOOL process 


Ida 


pathf 1 


; read the user's choice 


cpi 


1 


;if option 1 


jz 


pathl 


; then, go to pathl 


cpi 


2 


; if option 2 


jz 


path2 


;then, go to path2 


jmp 


comerror ;jmp to communication error 
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module PATH 1 






Catch a character from E register and store it in the 
buffer, and then send the character to the concentrator 



pathl : 



leap : 



push 


a! push b! 


push d! push h! 


lhld 


pointer 


;load HL reg with next buffer ptr 


mov 


m , e 


;move input char to the buffer 


call 


sendchar 


;send char to concentrator 


inx 


h 


; increase buffer ptr 


mov 


a , 1 


; check if buffer ptr reached end 


ani 


Of fh 


;of buffer 


jnz 


leap 


;if not, go along the normal path 


Ixi 


h , tdma 


; if end of buffer, reset buffer ptr 


shld 


pointer 


; store the increased buffer ptr 


pop h 


! pop d! 


pop b! pop a! 


ret 







module PATH 2 



Catch a character from E register and store it into the 
buffer. When the end_of_f ile (Ctrl- Z ) character is met, make 
a file and write the buffer into the file 



path2 : 



push 


a! push 


lhld 


pointer 


mov 


m , e 


mov 


a , e 


cpi 


T t 


jz 


save 



b! push d! push h! 

; load HL reg with next buffer ptr 
;move input char to the buffer 

; compare with end_of_file mark 
;if it matches , write the buffer 



59 



mark: 



markl : 



cpi 


t _ t 






jnz 


mark 






Ida 


warn 






cpi 


1 






jz 


warning 






inx 


h 


;increase buffer pointer 


mov 


a,h 






cpi 


OcOh 






jnz 


markl 






mvi 


a,l 






sta 


warnf 1 






shld 


pointer 


; store 


increased buffer pointer 


pop h 


! pop d! 


pop b ! 


pop a ! 


ret 









module PATH 3 



Read the file whose file name is given by the user into the 
buffer by one record(128 bytes) at a time. And then send 
the characters of the buffer to the concentrator. 



path3 : 


call 

lxi 


open 

d, nofile 


;open the file 






inr 


a 


;if it fails to open the 


file 




cz 


finis 


; go to finish with error 


message 


copy : 


call 


read 


;read a record from file 


into buff 




ora 


a 


;if it meets end_of_file 


char 




jnz 


eotranf 


;go to end of transfer file 




call 


f i lesend 


;send record to printer 


thru concen 
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eotranf : 



load the address of normal message 



finis : 



jmp 


copy 


lxi 


d , normal 


call 


trnsrdy 


mvi 


a , eof 


out 


ttydata 


call 


rcvrdy 


in 


ttydata 


mvi 


c ,printf 


call 


bdos 



call 


moref ile 


jmp 


boot 



check if transmit ready 

load Acc with end_of_file char 

send it to concen 

check if receive ready 

read a response from concen 

print the normal message 



;handle a request of another print 
;come out to CCP level 



; " subroutine SENDCHARACTER 

_ %** J 

> 

;Send a character of the buffer to the concentrator 



sendchar : 



call 


trnsrdy 


; check if transmit ready 


mov 


a , e 


;move char from 


E to Acc 


cpi 


f 1 


; compare with ' 


' of Ctrl-Z 


jz 


eosend 


; if yes , then go 


to end of send 


out 


ttydata 


; if not Ctrl-Z, 


send the char 


call 


rcvrdy 


; check if receive ready 


in 


ttydata 


; receive an acknowledgement char 


ret 
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SAVE 



save : 



call diskcopy 
call eocopy 






*************** * 9 * **^ * 9 * ************************************************************ * 9 * ************************ * 9 ** 9 ******* *V****** * f ** 9 * * 9 ***** 9 * ****** **** 9 **^*** ********* A 

M *% *% *% *% *% *% *% ^ A A A A A A A A #% #% #% #% 



subroutine DISKCOPY 



* 9 ******^**^*****^**^* 9 ^ ****** ****** ********* ****** ********* ****** ****** ********* *** ********* *************************** ****** ************ ****** *** *** * # * ****** *** *** ****** *** * f # 
A #% A A A A A A A A A A A A A A A A A A #% A S* /% #% #% #% 



Write the content of the buffer onto the disk file 



diskcopy : 


lhld 


pointer 






mvi 


a , eof 






mov 


m , a 






call 


make 


;make a file 


dmachg : 


call 


setdma 


;set DMA address 




call 


write 


;write the DMA buffer onto the fi 


; Increase 


the write pointer by 80h and restore it 




lhld 


wrptr 


; load HL reg with write ptr 




mov 


a, 1 


;move the lower addr of write ptr 




aci 


80h 


;add 80h to it with carry 




mov 


l,a 


; load L with increased lower addr 




jnc 


leapl 


;if no carry, jmp to leapl 




mov 


a,h 


; if carry is out, 




adi 


1 


; add 1 to upper addr of write ptr 




mov 


h , a 


;load K with increased upper addr 


leapl : 


shld 


wrptr 


; restore the increased write ptr 
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;Compare the write pointer with the buffer pointer 



lhld 


pointer 


; load HL reg with buffer ptr 


xchg 




;move HL reg to DE reg 


lhld 


wrptr 


;load HL reg with write ptr 


mov 


a , d 


;move upper addr of buffer ptr 


sbb 


h 


; subtract write ptr from buffer ptr 


cm 


eocopy 


;if result is minus, go to eocopy 


JP 


dmachg 


;if result is plus, write more 


mov 


a, e 


;move lower addr of buffer ptr 


sbb 


1 


;subtract write ptr from buffer ptr 


JP 

ret 


dmachg 


;if result is plus, write more 









* subroutine FILESEND * 

VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VC VCVCVC VC VC VC VC VC VC VC VC 

This subroutine sends the characters of the DMA buffer to 
the concentrator. This subroutine returns the control back 
to the PATH3 when it meets the Ctrl-Z (end of file char) 



;or the < 


end of 


buffer . 




f ilesend 


mvi 


c , 128 


;set the buffer counter 




lxi 


d , dbuf f 


;set DE register with buffer addr 


nextchar 


: ldax 


d 


;load Acc with a char from buffer 




inx 


d 


; increase buffer ptr 




mov 


b , a 


;move the char of A into B 




call 


trnsrdy 


; check if transmit ready 




mov 


a ,b 


; get stored char 




cpi 


eof 


; compare the char with end_of_file 




jz 


eotranf 


; if yes, then go to end of transfer 



63 




eosend : 




5 

eocopy : 



out 


ttydata 


;send the char to concen. 




call 


rcvrdy 


; check if receive ready 




in 


ttydata 


; receive an ack char from 


Z-100 


dcr 


c 


;decrease buffer ptr 




jnz 


next char 


;if not zero, get the next 


char 


ret 








• 


VC* 1C /C ^ rT /%" ^ ^ #wf /wwC 1C 1C 

subroutine END OF SENDCHAR 


1C 1C 1C 1C 1C 1C 1C* 


► o 

call 


r% *% #% 

trnsrdy 


4% *% *% /% #% A 

; check if transmit ready 




mvi 


a , eof 


;yes,send an end_of_file 


char 


out 


ttydata 






call 


rcvrdy 


; check if receive ready 




in 


ttydata 


; receive an ack char from 


concen 


jmp 


boot 


; come out to CCP 





******* subroutine END OF COPY 



call close 
mvi c, print f 

lxi d,eosave 
call bdos 
jmp boot 






64 






subroutine WARNING 



warning: mvi 


a, 0 


sta 


OecOdh 


mvi 


c ,printf 


lxi 


d , warnmsg 


call 


bdos 


call 


diskcopy 


call 


eocopy 


ret 





V# V# 

• /% 4% ¥% #% 4% /«/%/%/% 

> 


subroutine 


make : mvi 


c ,makef 


lxi 


d , tf cb 


call 


bdos 


ret 





• /f 

5 


*4T\ *4T* *4T\ VC /\ /\ /% 


subroutine 


open: 


mvi 


c , openf 




lxi 


d , tf cb 




call 

ret 


bdos 


• VC "/C 

> 


%*# 

/\ /\ #% /\ r% r% /\ 


subroutine 


read : 


mvi 


c , readf 




lxi 


d , tf cb 




call 

ret 


bdos 



MAKE 



OPEN 



READ 
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subroutine CLOSE 



3 



^ ^ 

/% 4T% #\ /> /> /% /\ #\ /\ />/>/><% 



close : 


mvi 

lxi 

call 

ret 


c , closef 

d , tf cb 
bdos 


• /V Vc Vc /% ^ ^ 

5 ' n 


*C /\ /% #% 


subroutine 


write : 


mvi 

lxi 

call 

ret 


c , writef 

d , tf cb 
bdos 


• /> >« n /« <» n <» <\ 

> 


/\ /% /% 


subroutine 


setdma : 


mvi 

lhld 

xchg 

call 

ret 


c , setdmaf 
wrptr 

bdos 


5 ” 


" '' '' '' " " 


subroutine 


trnsrdy : 


in 

ani 

jz 

ret 


ttystat 

01 

trnsrdy 


* <« /\ «« / x <« « >\ <« 

5 




subroutine 


rcvrdy : 


in 

ani 

jz 

ret 


ttystat 

02 

rcvrdy 



WRITE 



SETDMA 



TRANSMIT READY 



RECEIVE READY 



jz 

ret 
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subroutine INITIALIZATION 






* ^ ^ A «fc^ ^<#^4 %*# ^*** %*# %' 



%*# %^# %^# %*4 «**«* J 



Select an option of three alternatives 



init : 



mvi 


c ,printf 


; print the 


query string 


lxi 


d , query 






call 


bdos 






mvi 


c , conin 


;read the ; 


answer of user 


call 


bdos 






cpi 


•1’ 






cz 


setl 


; print out 


directly in Ctrl-P mode 


cpi 


'2' 






cz 


set2 


;save on a 


file in Ctrl-P mode 


cpi 


’3’ 






cz 


set3 


; print any 


existing file 


call 


typerror 


; typing error 


ret 










module SET 1 




;Set the 


buffer 


pointer 


and path-flag. Also 


checks if 


the 


; printer 


is bus> 


• or not. 








setl : 


lxi 


h, tdma 


;load HL reg with ; 


addr of buffer 




shld 


pointer 


;store buffer addr 


into buffer 


ptr 




mvi 


a, 1 


;set pathf lag with 


number 1 






sta 


pathf 1 










call 


trnsrdy 


; check if transmit 


ready 
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mvi 


a, 'Q' 


;send a request to concen. 


out 


ttydata 




mvi 


c , 0 f f h 


;set counter with # of trials 


in 


ttystat 


;read status port 


dcr 


c 


;decrease the counter 


cz 


waite 


;if zero, should wait 


ani 


02 




jz 


statinl 




in 


ttydata 


; receive an ack from concen. 


mvi 


c , printf 


;print a starting message 


lxi 


d, start 




call 


bdos 


. 


jmp 


boot 


;come out to CCP 



5 ” 


• 




/% *\ *\ *% *\ 
module SET 2 * 


; Set 


the 


buffer 


/\ /\ A /% /% /% /% #% /\ 

pointer and write pointer. Also construct 


; the 


FCB 


whose 


file name 


is given by the user. 


set2 : 




lxi 


h , tdma 


;set the buffer and write ptr with 






shld 


pointer 


;the buffer address 






shld 


wrptr 








mvi 


a, 2 


;set the pathf lag with number 2 






sta 


pathf 1 








mvi 


c .print f 


;print the selection message 






lxi 


d , selname 


; load DE reg with addr of msg 






call 


bdos 








call 


readname 


;read file name given by the user 






mvi 


c , printf 


;print the starting message 
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lxi 

call 

jmp 



d , start 

bdos 

boot 



• M 

5 

♦ VC 
5 




M ¥\ +\ #% A *% /% 

module SET 3 * 


• /% /\ /% /% /\ /\ /% /% /\ /% 
* 

; Construct the 


A #% #% #% 

FCB whose 


file name is given by the user, and 


; check if 


the 


printer is 


busy or not . 


set3 : 


mvi 


c ,printf 


;print file name message 




lxi 


d , selname 


;load DE reg with addr of message 




call 


bdos 






call 


readname 


;read the filename typed by user 

;into FCB 




call 


trnsrdy 


; check if transmit ready 




mvi 

out 


a, 'Q' 
ttydata 


;send a request to concen. 




mvi 


c , Of fh 


;set counter with # of trials 


statin2 : 


in 


ttystat 


;read status port 




dcr 


c 


;decrease the counter 




jz 


waite 


;if zero, printer is busy 




ani 


02 


; check if receive ready 




jz 


statin2 


;if not ready, read again 




in 


ttydata 


;read response from concen. 




cpi 


'Y' 


;is response 'Yes'? 




jnz 


comerror 


; i f not , communication error 




jmp 


path3 


; starts to send the file 
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Subroutine 



MORE 



FILE 



raoref ile : 



movaf cb : 



typerror : 



n n n n 


v# sC /C /%* vr 


mvi 


c , 33 


lxi 


d , af cb 


lxi 


h, tf cb 


ldax 


d 


mov 


m,a 


inx 


d 


inx 


h 


dcr 


c 


jnz 


movaf cb 


mvi 


c , print f 


lxi 


d ,moreprt 


call 


bdos 


mvi 


c , conin 


call 


bdos 


cpi 


-Y- 


cz 


set3 


cpi 


'N' 


cnz 


typerror 


ret 


Sub: 


mvi 


c , printf 


lxi 


d , typerrm 


call 


bdos 


jmp 


boot 



U %*# 



• %*# %*# %*# %*# %*# J 



;set counter with # of char of AFCB 
; load DE reg with addr of AFCB 
; load HL reg with addr of TFCB 

; load Acc with char of AFCB 
; store char of Acc into TFCB 
; increasd addr of AFCB 
; increase addr of TFCB 
;decrease counter 
;if not done, move the nest char 

;print the message 



;read the answer of user 

; if yes, print anotherfile 

;if no , come out to CCP 

;if any other char, error message 



Subroutine TYPERROR 
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5 



Subroutine COMmunication ERROR 



comerror : 



mvi 


a , ' P ' 


; tell 


the concentrator 


of 






; communication error 




out 


ttydata 








mvi 


c ,printf 


;print 


error message on the 


screen 


lxi 


d , comerrm 








call 


bdos 








jmp 


boot 









Subroutine WAITE 



waite : 



mvi 


a, 'P' 


;tell the concen. of communication 
; error 


out 


ttydata 




mvi 


c , printf 


;print the wait message 


lxi 


d ,wait 




call 


bdos 




jmp 


boot 





Subroutine READNAME 



readname : 



mvi 


c , readconf 


lxi 


d , filename 


call 


bdos 


lxi 


d , f ilename+ 1 


ldax 


d 


cpi 


0 


jz 


default 



;read the edited file name 
; given by user 

; load DE addr of char counter 
; load Acc the # of chars 
;if file name is not typed, 
;then take the default filename 
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readfnr : 



meetdel : 



readf t : 



mov 


c , a 


;move the # of chars to C reg 


inx 


d 


; load DE reg with the address of 
;name buffer 


lxi 


h, tfcb+1 


;load HL reg with the addr of TFCB 


mvi 


b , 8 


;set the # of chars of the filename 


ldax 


d 


;move the filename to TFCB 


cpi 


f ? 


;if it meets the delimiter, 


jz 


readft 


;then read filetype 


call 


charconv 


; convert the lower case into 
;upper case character 


mov 


m, a 




inx 


d 




inx 


h 




dcr 


c 




jz 


eoread 


;no filetype, go to end_of_read 


dcr 


b 


;if # of filename exceeds 8 


jz 


meetdel 


;then, go to meet_delimiter 


jmp 


readfnr 


;read the next char of filename 



ldax 


d 


;read a char from console buffer 


cpi 


? ? 


; compare with the delimitter 


jz 


readft 


;if matches, read file type 


inx 


d 


; increase name buffer pointer 


jmp 


meetdel 


; repeat reading char 


mvi 


b , 3 


;set char counter with 3 


inx 


d 


; increase name buffer pointer 


dcr 


c 


;decrease # of chars 


lxi 


h, tf cb + 9 


;load HL with addr of file type 
;of File Control Block 
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readftr: ldax d 



call charconv 
mov m,a 
dcr c 
jz eoread 

dcr b 
jz eoread 

inx d 
inx h 
jmp readftr 

eoread : 

ret 



Subroutine DEFAULT 



; copy the default FCB into Temporary FCB. 
default : 





mvi 


c , 33 


;set the counter with 33 




lxi 


d,dfcb 


;set Default FCB pointer 




lxi 


h, tf cb 


;set Temporary FCB pointer 


movf cb : 


ldax 


d 


;read a char from DFCB 




mov 


m , a 


; store it into TFCB 




inx 


d 


; increase DFCB pointer 




inx 


h 


; increase TFCB pointer 




dcr 


c 


;decrease counter 




jnz 


movf cb 


;move another char 




ret 







read a char from name buffer 
convert lower case into upper 
store char into FCB 
decrease # of chars 
if name buffer exhausted 
then, go to end of read 
decrease file type counter 
if FCB is full, go to eoread 
increase name buffer pointer 
increase FCB pointer 
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S ub r ou t ine CHARC ONV e r t Vr Vr •& 'k Vc 'V Vc Vc * Vr ' V Vr 'A- 

Converts the characters from 'a' through 'z' into the upper 
case characters. 



charconv : 



cpi 


’a’ 


jm 


no change 


cpi 


'z' 


JP 


no change 


sui 


20h 



nochange : 

ret 



DATA AREA 



pathf 1 : 


db 


0 


warn: 


db 


0 


df cb : 


db 


0 




db 


' TEMPFILE 




db 


’$$$' 




db 


o 

o 

o 

o 




ds 


16 




db 


0 




ds 


3 



tf cb : 


db 


0 




db 


f 




db 


T ? 




db 


O 

O 

S* 

O 

O 




ds 


16 




db 


0 
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ds 

afcb: db 

db 
db 
db 
ds 
db 
ds 

filename : 
db 
ds 



3 

0 

f f 

t f 

0 , 0 , 0,0 
16 
0 
3 



16 

16 



query: db 

db 
db 

db 

db 

db 

db 

db 

db 

db 

db 



Odh, Oah 

'Welcome to SPOOL utility. ' , Odh , Oah , Odh , Oah 
'Three options are: ', Odh, Oah 

'1. Print any characters on console directly' 
'to the printer.' 

Odh , Oah 

'2. Save any charecters on console in a file.' 
Odh , Oah 

'Print any existing f ile . ' , Odh , Oah 
Odh , Oah , Odh , Oah 

'Select any one of three options above : $' 



start: db 

db 
db 
db 
db 
db 



Odh, Oah 

'Press the Control_p key and go ahead.' 

Odh , Oah 

'On the completion of your work, press the' 
Control_Z key' 

Odh, Oah, '$' 



selname:db Odh , Oah, ' File name : $' 
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moreprt : db 


Odh, Oah, 'Do you like to print another file?' 


db 


’(Y/N) : $' 


typerrm : db 


Odh, Oah 


db 


'Typing error. Try again .$', Odh , Oah, ’$ ' 


eoprint : db 


Odh, Oah, ' Printing complete . ’ , Odh, Oah, ' $ ' 


eosave: db 


Odh, Oah, ' Saving file complete .', Odh , Oah 


wait: db 


Odh , Oah, ' Printer is busy now. Try again.' 


db 


Odh , Oah, ' $ ' 


comerrm: db 


Odh, Oah, ’ Protocol error. Try again.' 


db 


Odh, Oah, 


nofile: db 


Odh, Oah, 'No source f ile . ' , Odh , Oah , ' $ ' 


wrprot : db 


Odh, Oah, 'Write protected? ' , Odh, Oah, ’ $ ' 


normal: db 


Odh , Oah, 'Spool complete . ' , Odh , Oah , ' $ ' 


warnmsg : db 


Odh, Oah, 'Your file is out of buffer size' 


db 


Odh, Oah, 'Make your file again ', Odh, Oah, ’ 


ds 


32 


stack: 





• rs * 

y 

• Vf 

y 

> n 


\ /% /> A 

Intercept Routine of Control-p 

% *% *-% *% #% #% /% /% #% 0% /X /I 


org 

call 


0d800h 

OdOOOh 


mvi 


a , 19h 


jmp 


Of 99ch 


end 
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